TOS Silver 2000/TOS Silver 2000.iso/programm/MM2_DEV/S/COMP/TEST/PROCCONS.M

Text File | 1994-02-16 | 382 b | 24 lines

MODULE ProcCImport;
(*$N+,E MOS*)

(* Alias-Definitionen von Prozeduren *)

IMPORT GEMDOSIO;
(*
FROM SYSTEM IMPORT ASSEMBLER, ADDRESS, CADR;
FROM InOut IMPORT Read;
FROM InOut IMPORT WriteString;
FROM P2 IMPORT WS;
*)
FROM P3 IMPORT Wr;

VAR ch: CHAR;

BEGIN
  (*
  ASSEMBLER BREAK END;
  WriteString ("<WriteString>");
  *)
  Wr (" <Wr> ");
END ProcCImport.